object Dlg_SelAddr: TDlg_SelAddr Left = 319 Top = 236 BorderStyle = bsDialog Caption = 'Select Address' ClientHeight = 326 ClientWidth = 543 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object L_book: TLabel Left = 8 Top = 16 Width = 69 Height = 13 Caption = '&Address Book:' FocusControl = CB_books end object Bevel1: TBevel Left = 8 Top = 40 Width = 529 Height = 3 Shape = bsTopLine end object L_name: TLabel Left = 8 Top = 52 Width = 31 Height = 13 Caption = '&Name:' FocusControl = E_name end object Bevel2: TBevel Left = 8 Top = 288 Width = 521 Height = 3 Shape = bsTopLine end object L_Info: TLabel Left = 272 Top = 16 Width = 3 Height = 13 end object CB_books: TComboBox Left = 88 Top = 12 Width = 177 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 OnChange = CB_booksChange end object E_name: TEdit Left = 72 Top = 48 Width = 145 Height = 21 TabOrder = 1 OnChange = E_nameChange end object LV: TListView Left = 8 Top = 76 Width = 209 Height = 173 Columns = < item Caption = 'Name' Width = 100 end item Caption = 'EMail Address' Width = 150 end> HideSelection = False MultiSelect = True ReadOnly = True RowSelect = True SmallImages = DM_Language.IL_AddressList SortType = stText TabOrder = 2 ViewStyle = vsReport end object BtnOk: TButton Left = 184 Top = 298 Width = 75 Height = 22 Caption = 'OK' ModalResult = 1 TabOrder = 6 OnClick = BtnOkClick end object BtnCancel: TButton Left = 288 Top = 298 Width = 75 Height = 22 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 7 end object Notebook: TNotebook Left = 224 Top = 48 Width = 313 Height = 237 PageIndex = 1 TabOrder = 5 object TPage Left = 0 Top = 0 Caption = 'Default' object L_members: TLabel Left = 88 Top = 8 Width = 46 Height = 13 Caption = 'Members:' end object BtnAdd: TButton Left = 8 Top = 40 Width = 75 Height = 25 Caption = '&Add' TabOrder = 0 OnClick = BtnAddClick end object LVmembers: TListView Left = 88 Top = 28 Width = 217 Height = 201 Columns = < item Width = 100 end item Width = 150 end> MultiSelect = True ReadOnly = True RowSelect = True SmallImages = DM_Language.IL_AddressList TabOrder = 1 ViewStyle = vsReport OnKeyDown = LVmembersKeyDown end end object TPage Left = 0 Top = 0 Caption = 'To' object SB_addto: TSpeedButton Left = 20 Top = 24 Width = 73 Height = 23 Caption = '->' OnClick = SB_addtoClick end object SB_removeto: TSpeedButton Left = 20 Top = 48 Width = 73 Height = 23 Caption = '<-' OnClick = SB_removetoClick end object SB_addcc: TSpeedButton Tag = 1 Left = 20 Top = 104 Width = 73 Height = 23 Caption = '->' OnClick = SB_addtoClick end object SB_removecc: TSpeedButton Tag = 1 Left = 20 Top = 128 Width = 73 Height = 23 Caption = '<-' OnClick = SB_removetoClick end object SB_addbcc: TSpeedButton Tag = 2 Left = 20 Top = 184 Width = 73 Height = 23 Caption = '->' OnClick = SB_addtoClick end object SB_removebcc: TSpeedButton Tag = 2 Left = 20 Top = 208 Width = 73 Height = 23 Caption = '<-' OnClick = SB_removetoClick end object L_to: TLabel Left = 120 Top = 8 Width = 16 Height = 13 Caption = 'To:' end object L_cc: TLabel Left = 120 Top = 88 Width = 16 Height = 13 Caption = 'Cc:' end object L_bcc: TLabel Left = 120 Top = 168 Width = 22 Height = 13 Caption = 'Bcc:' end object LB_to: TListBox Left = 120 Top = 24 Width = 185 Height = 57 ItemHeight = 13 MultiSelect = True TabOrder = 0 end object LB_cc: TListBox Left = 120 Top = 104 Width = 185 Height = 57 ItemHeight = 13 MultiSelect = True TabOrder = 1 end object LB_bcc: TListBox Left = 120 Top = 184 Width = 185 Height = 45 ItemHeight = 13 MultiSelect = True TabOrder = 2 end end object TPage Left = 0 Top = 0 Caption = 'Sms' object Label1: TLabel Left = 88 Top = 8 Width = 74 Height = 13 Caption = 'SMS Recipient:' end object btnAddSMS: TButton Left = 8 Top = 40 Width = 75 Height = 25 Caption = '&Add' TabOrder = 0 OnClick = btnAddSMSClick end object lvSMS: TListView Left = 88 Top = 28 Width = 217 Height = 201 Columns = < item Caption = 'Name' Width = 100 end item Caption = 'Mobile Phone' Width = 150 end> MultiSelect = True ReadOnly = True RowSelect = True SmallImages = DM_Language.IL_AddressList TabOrder = 1 ViewStyle = vsReport OnKeyDown = lvSMSKeyDown end end object TPage Left = 0 Top = 0 Caption = 'Select' end end object BNewCard: TButton Left = 24 Top = 256 Width = 75 Height = 22 Caption = 'New...' TabOrder = 3 OnClick = BNewCardClick end object BProperty: TButton Left = 120 Top = 256 Width = 75 Height = 22 Caption = 'Property...' TabOrder = 4 OnClick = BPropertyClick end object CT_books: TZComboTree Left = 88 Top = 12 Width = 177 Height = 21 Images = DM_Language.IL_AddressList ImageIndex = -1 StateIndex = -1 BoxWidth = 17 BoxGlyph.Data = { D6000000424DD60000000000000076000000280000000D0000000C0000000100 0400000000006000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF F000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFF0FFFFF F000FFFFF000FFFFF000FFFF00000FFFF000FFF0000000FFF000FFFFFFFFFFFF F000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFFF000} TreeCursor = crDefault TreeEnabled = False TreeHeight = 200 Indent = 19 TreeReadOnly = False ShowButtons = True TreeShowHint = False ShowLines = True ShowRoot = True SortType = stNone TreeVisible = False OnChange = CT_booksChange OnExpanding = CT_booksExpanding end object ILsmall: TImageList Left = 96 Top = 136 end object Language: TLanguage LangCenter = DM_Language.LangCenter ResStrings.Strings = ( '0010=Shared' '0011=Private' '0020=Connecting to Address Server. Please waiting. Press ESC to ' + 'cancel it.' '0030=Mobile Phone' '0031=Name' '0032=Email Address' '0040=You can send a short message to 10 persons at the most.') Left = 384 Top = 8 end end